begintownscript;
variables;
    int choice;
body;
beginstate INIT_STATE;
    set_name(30, "Hira-Bok");
break;
beginstate EXIT_STATE;

break;
beginstate START_STATE;

break;
beginstate 10;
    if (get_flag(18, 0) == 0)
        message_dialog("Though this place was clearly built by vahntai, you doubt there are any of them living here.", "This place is quite dark and it is very cold inside.");
    set_flag(18, 0, 1);
break;
beginstate 11;
    if (get_flag(18, 1) == 0)
        message_dialog("There are some vahnatai chairs and a table in this room. Maybe there could be vahnatai living here.", "Yet, you have seen none. However, the force pillar on the stand is active. Someone or something must be living here.");
    set_flag(18, 1, 1);
break;
beginstate 12;
    if (get_flag(18, 2) == 0)
        message_dialog("This room is dangerous. If the acid pools aren't bad enough there is a lightning pillar on a stand here.", "It is deactivated. However, it doesn't look like it's broken.");
    set_flag(18, 2, 1);
break;
beginstate 13;
    if (get_flag(18, 3) == 0)
        message_dialog("The wheel in the centre of this room must be of such worth that it is profitable to place several lightning pillars and two vahnavois guarding it.", "A vahnavoi is an animated vahnatai. They can't think, they can only obey their masters. That is why these two are hostile.");
    set_flag(18, 3, 1);
break;
beginstate 14;
    if (get_flag(18, 4) == 0)
        message_dialog("The most annoying thing about crypts, tombs etc. is that they are all cold. You need a thick tunic or something else if you want to explore in them.", "This place is of such cold. The room you are in, however, seems a lot colder than the others.");
    set_flag(18, 4, 1);
break;
beginstate 15;
    if (get_flag(18, 5) == 0)
        message_dialog("Bad. There are more vahnavois on this room. They are waiting behind the pillars, propably trying to ambush you. You see them, however, before they see you.", "There are also a couple of hraithe. A hraithe is like a vahnatai lich, a vahnatai whose magic is so strong that it stops age from killing it. The hraithe are un-living souls imprisoned in their own rotting bodies.");
    set_flag(18, 5, 1);
break;
beginstate 16;
    if (get_flag(18, 6) == 0)
        message_dialog("There are fifteen statues standing on small pedestals in the lava. On the other side of the pool is the only other exit.", "One interesting detail is that every statue, except the red one near the other side, seems to point at one other.");
    set_flag(18, 6, 1);
break;
beginstate 17;
    if (get_flag(18, 7) == 0)
        message_dialog("This room is beautiful. There are two rows of crystal pillars and a bunch of statues. In the back there is a pedestal with a huge blue crystal on it.", "It is a crystal soul. It is the best condition that a vahnatai can receive after death. Basically, they are like mind crystals but they have all of their own will and magic left from their life. They are the masters, the ancestors of the vahnatai.");
    set_flag(18, 7, 1);
break;

beginstate 18;
    if (get_flag(118, 3) == 1)
    {
        reset_dialog();
        add_dialog_str(0, "When you approach the gate it begins to transform slowly. When you're really close it gains shape as a portal.", 0);
        add_dialog_choice(0, "Leave");
        add_dialog_choice(1, "Enter");
        choice = run_dialog(0);
        if (choice == 2)
            teleport_party(43, 10, 0);
    }
break;
beginstate 19;
    if (get_flag(118, 3) == 1)
    {
        reset_dialog();
        add_dialog_str(0, "You could easily return the same way as you came using the portal created by Hira.", 0);
        add_dialog_choice(0, "Leave");
        add_dialog_choice(1, "Return");
        choice = run_dialog(0);
        if (choice == 2)
            teleport_party(8, 27, 0);
    }
break;